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PAGE % UOAPER SRC l^OAD PROGRAMS POR INTERACTIVE MODEi 

O .TITUE. UQAD PROGRAMS FOR INTERACTIVE MODE, ^ 

/COPYRIGHT JANUARYi 1V70 

/DIGITAL EQUIPMENT CORPORATION? MAYNARO, MASS| ^. 

O /ED HaTON " ^ 





/7--2/-71 
/ 

,ABS 






.IOC 

/ 

UPREFX=560 


000i360 


000271 


UPAR0W=271 


000S40 


PSOO=540 


00055^2 


TYP0NE?'522 


000460 


TSIXBT=460 


000^14 


CRLF=5i4 


000<i!33 


WAIT=253 


000553 


UR0T6=533 


002!326 


AGTUST=DTBUP 


000120 


GETMQN=120 


000565 


DIRECT=565 


000024 


BUKNUM524 


000314 


READ=3i4 


000756 


SLINK=756 


000247 


CNAINS247 


700312 


KRB=700312 


700311 


KSF?7003ia 


707764 


E:bA = 707764 


707702 


EEM=707702 




.EJECT 



o 

01100 .IOC 1100 

O 

o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 

o 



O ! 

i 

O I 

I 

o •' 

o i 
o i 

j 

o : 

! 

I 

O ; 

o 
o 

i 

o I 

o 

o 

o 

o 

o 

o 

o 

o 



o 
o 



o 
o 
o 
o 
o 
o 
o 

o 
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O 0Xl!i)0 100514 LOADER 

01101 100560 



01141 744000 



^MS 


CHi,r 


JMS 


UPREFX 


EBA 




EEM 




LAW 


«1 


OAC 


C0RMAP# 


D^M 


l00 


KRB 




LAC 


(SLINK^^l 


DAQ 


1,0 


LAW 


b25 


DAC 


DMEMS2# 


D5!M» 


If 


ISZ 


0MEMS2 


gMP 


,'«g 


LAC 


{TSYSLD^l 


JMS 


TSIXBT 


JMS 


mv ~ 


LAC 


4!?? 


SNA 




gMP 


I,0AD,& 


LAC 


101 


AND 


{7777 


SAD 


(7777 


SKP 




JMP 


LOAD, 6 


LAC 


%H 


JMP 

/ 

LAW 


LOAORD 


''I 


DAC 

/ 

LAC 


!^? 


(TMEMSErfl 


JMS 


TSIXBT 


D2M 


DMEMS2 


CLU 




, EJECT 





o 
o 
o 
o 



01102 707764 

O 03.1i33 707702 

011feJ4 777777 

01105 043246 

O 01106 1401^30 D^M 100 /C(,EAR IS INTERACTIVE O 

01107 7003i2 

01110 203267 LAC (SUINK^^l /qt,EAR LINK TABL? 

O 01111 040010 DAC 10 O 

01112 7777^^6 

01113 043247 
O 01114 160010 Dim 10 O 

01115 443247 

01116 601114 
O 01117 203270 LAC {TSYSLD^l /SYSLOD O 

01120 100460 

01121 100514 
O 01122 200452 

01123 741200 

01124 601134 
O 01125 200101 

01126 503271 

01127 543271 
O 01130 741000 

01131 601134 

01132 2001^1 
O 01133 601233 

01134 777777 L0AD|6 

O 01135 040452 

01136 203272 

O 01137 100460 

01140 143247 D2M DMEMS2 /DESIRED MEMORY TO BE USED FOR PROGRAM 



o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 

o 



u 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 

o 



PAGE 3 LOADfciR SRC 

0114^2 1002t?3 

01143 543iJ73 

01144 600120 

01145 543274 

01146 60116^3 

01147 54327t> 

01150 6011/0 

01151 503276 

01152 043256 

01153 203247 

01154 100533 

01155 243256 

01156 043247 

01157 601142 

01160 203247 

01161 503277 

01162 744000 

01163 102236 

01164 043247 

01165 760334 

01166 100522 

01167 601142 



LOAD PROGRAMS FOR INTERACTIVE MODEi 



lOADRA 



lOADRB 



JMS 


WAIT 


SAD 


(203 


.J MP 


GETMQN 


SAD 


(377 


JMP 


lOadrb 


SAD 


(2?,5 


JMP 


LOadrc 


AND 


(0000/7 


DAC 


TEMPA* 


LAC 


DMEMS2 


gns 


LR0T6' 


XOR 


TEMPA 


DAC 


OMEMSii 


JMP 

/ 

LAC 


lqadra 


DHEMS2 


AND 


nmrn 


CLL 




JMS 


RR0T6 


DAC 


PMEMS2 


LAW 


334 


JMS 


TYPONE 


JMP 


LOADRA 


.EJECT 





/WAIT FOR KEYBOARD INPUT 



/RUHDUT? 
/YES 



/A CARRIAGE RETURN TERMINATES MEMORY SIZE 
/MASK OFF TO TRIMMED ASCII 



/A RUBOUT BROUGHT US HERE 
/DELETE LAST CHARACTER TYPED 
/AND ECHO A BACK SLASH N, 



/GO BACK AND MST^N FOR NEXT CHARACTER 



o 
o 
o 
o 
o 
o 
o 
o 



o 



o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 

o 



o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 

o 
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4 


LOAPEK SRC 


01170 


203247 


011/3, 


741200 


01172 


600122 


01173. 


543300 


01174 


601216 


01175 


543301 


01176 


601220 


01177 


543302 


01200 


601222 


01201 


543303 


01202 


601224 


01203 


543304 


01204 


601226 


01205 


543305 


01206 


601230 


01207 


543306 


01210 


601232 


01211 


760212 


01212 


100522 


01213 


7602/7 


01214 


100522 


01215 


601135 


01216 


203307 


01217 


601233 


01220 


203310 


01221 


601233 


01222 


203311 


01223 


601233 


01224 


203312 


01225 


601233 


01226 


203313 


01227 


601233 


01230 


203314 


01231 


601233 


01232 


203315 



|,QAD PROGRAMS FOR INTERACTIVE MOpE 



LOADRO 


LAC 
SNA 


DMEMSzf 




gMP 


GETMON+2 




SAD 


(007013 




JMP 


itsaK"' 




SAD 


(616213 




JMP 


lfsl2K 




SAD 


(616613 




JMP 


ITS16K 




SAO 


(626013 




JMP 


ITS20t< 




SAO 


(626413 




JMP 


JTS24K 




SAD 


(627013 




vIMP 


lTS2aK 




SAO 


(636213 




JMP 


ITS32K 




LAW 


212 




JMS 


TYPONE 




LAW 


277 




JMS 


TYPONE 




JHP 


LOADRAsS 


JTS8K 


LAC 


(017777 




JMP 


LOADRO 


ITS12K 


LAC 


(027777 




vJMP 


LOADRQ 


JTS16K 


LAC 


(037777 




JMP 


LOADRU' 


JTS20K 


LAC 


(047777 




JMP 


LQAORP" 


ITS24K 


LAC 


^mim 




^MP 


LOADRO' 


ITS26K 


LAC 


(067777 




JMP 


LOADRO' 


rTS32K 


LAC 
.EJECT 


{^11111 



/DMEMS2 CONTAINS k BIT ASCII OF 
/MEMORY SIHE TYPED IN, 



u 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 

o 



o 

o 
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51311 7W031H KRB 

01312 6012^)2 JMP LOADRG 

O , EJECT 

O 

o 



(J 
o 



O ai2vi3 0432i>3 LOADRD DAC SLPAPR* /STORE HIGHEST AVAILABLE MEMORY ADDRESS O 

01234 043241 DAC CLDAUR# 

01235 040101 DAC 103, ' _ 
O 01236 777727 LAW =n /NOW CLEAR THE ACTLST AND INSERT O 

01237 043242 OAC CNfR# /THE PROGRAM TITLES IN ,SIX8T 

01240 203316 LAC (ACTLST«1 _ 

O 01241 040010 DAC 10 O 

01242 0400U DAC 11 

01243 040013 DAC 3,3 

O 01244 040016 DAC 16 O 

01245 160010 DZM* 10 

01846 443242 ISH CNTR 

O 01247 601245 JMP I'^g O 

01250 203317 LAC U) 

01251 043250 DAC NUM# /PROGRAM NUMBER ^ 
O 01252 143221 LOADRG 02M A " /THESE ARE TEMPORARY STORAGE LOCATIONS O 

01253 143222 DHM B /FOR TITLES OF PROGRAMS TO BE INSERTED 

01254 777771 LAW «7 

O 01255 043237 DAC gARCNT# /CHARACTER COUNTER FOR PROGRAM THLES O 

01256 203320 LAC rTITL£^l*^00000 /THEY ARE LIMITED TO SIX CHARACTERS 

01257 100460 4MS TSIXBT /PRINT TITLE ^ 
O 01260 203250 LAC NUM /TEST FOR PROGRAM NUMBER TO BE TYPED, O 

01261 102243 JMS PR2DD /THEY ARE le80{DEClMAL) TO BE TYPED 

01262 760240 LAW 240 /AFTER THE pESIGNATION TITLEi ^ 
O 01263 100522 4MS TYRONE O 

• / 

01264 100253 LOADRF JMS WAIT /GO TO WAIT lOQP ^ 

O 01265 5432/3 SAD (203 /CONTROL C? O 

01266 600120 JMP GETMON /YES, GO TO MONITOR 

01267 543274 SAD (377 /RUBQUT _ 
O 01270 741000 SKP O 

01271 601274 JMP 1*3 

01272 102273 JMS OBPRSK 

O 01273 601264 JMP LOADRF O 

/ 

01274 543321 SAD (375) /ALTMOQE? 

O 21275 102050 JMS CORE O 

01276 543322 SAD (376) 

01277 102050 JMS CORE ^ 

o ' " ■■ / '■• o 

01300 543275 SAD (000215 /CR TERMINATOR? 

01301 601313 JMP LOADRE 

O 01302 503276 AND (Qmr/7 /VALID CHARACTER INSERT INTO WORD O 

01303 102213 JMS OBPRSL 

01304 443237 ISZ CARCNT 

O 01305 601264 JMP LOADRF O 

01306 100514 JMS CRLf 

01307 203323 LAC ( WHAT''1*400000 

O 01310 100460 JMS TSIXBT O 



O 
O 

o 



o 
o 
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UOAOE 


o 


01313 


443237 




01314 


755000 




01315 


601321 


o 


01316 


102213 




01317 


443237 




013H0 


601314 


o 








01321 


203221 




01323 


741200 


o 


01323 


601403 




01324 


777742 




01325 


043242 


o 


01326 


203324 




01327 


040012 




01330 


203221 


o 


01331 


560012 




01332 


601341 




01333 


200012 


o 


01334 


343325 




01335 


040012 


o 


01336 


443242 




01337 


601330 




01340 


601400 


o 








01341 


203222 




01342 


560012 


o 


01343 


60134/ 




01344 


440012 




01345 


440012 


o 


01346 


601336 


o 






o 






o 






o 






o 






o 






o 






o 






o 







SRC 



I^QAD PROGRAMS FOR INTERACTIVE MODE. 



l,OADRE 



L.OADRJ 



ISH 

SKPICLA 

JMP 

ms 

ISZ 
.JMP 
/ 
L,AC 

SNA 

JMP 

l,AW 

DAC 

l,AC 

DAC 

l,AC 

SAD* 

JMP 

UAC 

TAD 

DAC 

/ 

ISZ 

JMP 

JMP 

/ 

LAC 

SAD* 

JMP 

ISZ 

ISH 

JMP 

.EJECT 



CARCNT 

I +4 

DBPRSl, 
CARCNT 

I b4 



lOADRN 

= 36 

CNTR 

(DIRECT^l 

12 

A' 

12 

,+7 

3,2 

(0000feJ3 

12 

CNTR 

LOADRJ 

NQTINO 

B 

12 
QOADRK 

12 

• «10 



/LEFT JUSTIFY 
/IN t.OCATlONS 

/LEFT ^JUSTIFY 



ONE TO SIX 

A AND 8 



ASCII CHARACTERS 



/ANY CHARACTER IN A? POSSIBILITY OF 

/A CARRIAGE RETURN TYPED WITHOUT ANY 

/TITLE TYPED.' THAT IS A TERMINATOR, 

/NOW COMPARE TITLE WiTH DIRECTORY 

/COUNTER 

/ADDRESS OF DIRECTORY «!, 



/COMPARE FIRST THREE CHOPPED A3CII CHARACTERS 

/YES 

/NO, UPDATE TO LOOK AT FIRST PART 

/OF NEXT TITLE IN DIRECTORY, 



/DONE 

/NO 

/YES, NOT IN DIRECTORY, 



TELL OPERATOR 



/SECOND PART OK? 

/YES PUT HIM IN ACTLST 

/ADD TWO TO DIRECTORY POINTER TO 

/POINT AT FIRST PART OF NEXT TITLE 



o 

o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 

o 



u 






o 
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UQAPE 


o 


03,347 


203316 




013S0 


040010 




013^1 


220010 


o 


01352 


741200 




01353 


601367 




013S4 


543221 


o 


01355 


601360 




01356 


440010 


o 


01357 


60l3bl 


01360 


220010 




01361 


543222 


o 


01362 


741000 




01363 


601351 




01364 


203326 


o 


01365 


100460 




01366 


601252 


o 


01367 


203221 




01370 


060011 




01371 


203222 


o 


01372 


060011 




01373 


443250 




01374 


203250 


o 


01375 


543327 




01376 


601403 




01377 


601252 


o 








01400 


203330 




0i401 


100460 


o 


0i4'42 


601252 




01403 


100514 


o 


01404 


717777 




01405 


343250 




01406 


740001 


o 


01407 


343317 




01410 


043252 




01411 


203331 


o 


01412 


040014 




01413 


040010 




01414 


777602 


o 


01415 


043242 




01416 


160010 




01417 


443242 


o 


01420 


601416 


o 






o 






o 






o 







SRC l,OAD PROGRAMS FOR INTERACTIVE MODE 



SNA 

JHP l,qADRLs'5 

SAD A 

JMP 1*3 

ISH 10 

^MP l,0ADRK*2 

/ 

LACH* 10 

SAD B 

SKP 



lAC A 

DAC* 11 

LAC B" 

DAC» 11 



ISH CNTR 

JMP 1^2 



u 
o 



LOADRK LAC (ACTUSTr^l /CHECK TO SEE THAT OPERATOR O 

DAC 10 /HAS NOT Al^READY ENTERED 

LAC* 10 /THE PROGRAM IN THE ACTIVE LIST 



o 
o 
o 
o 



JMP LQADRK*2 

LAC (REDUN5;i + 400000 

JMS TSJXBT O 

JMP LOADRG 

/ 



o 
o 



ISZ NUM 

UOADRL LAC NUM 

SAD (000037 /LAST TITLE TYPED? O 

JMP LOADRN /YES 

JMP LOADRG /NO 

/ ■■ " o 

NOTIND LAC (NOTIN??l + 400000 /GET ADDRESS =1 OF NOT IN DIRECTORY 

JMS TSJXBT /Mfc;SSAGE 

JMP LQADRG O 

/ 

LOADRN JMS CRt,F 

LAW «i O 

TAD NUM 

CMA 

TAD U O 

DAC FRQCNT# /PROGRAM COUNTER, AMOUNT OF PROGRAMS LISTED 

|,AC CBUFF^l /IN ACTIVE LIST, 

DAC 14 /BUFFER FOR BUBBLE SORT O 

DAC 10 

LAW '^176 

OAC CNTR O 

02M« 1.0 /CLEAR THE BUFFER 



O 
O 
O 
O 

O 



o 






o 








PAGE U 


LOADE 


o 






o 








01423, 


220013 


o 


01422 


741200 




01423 


600247 




01424 


741000 


o 


01425 


220013 




01426 


043260 




0142/ 


060014 


o 


01430 


220013 




01431 


043261 




01432 


060014 


o 


01433 


203324 




01434 


040010 




01435 


220010 


o 


01436 


543260 




01437 


601443 




01440 


200010 


o 


01441 


343325 




01442 


601434 


o 


01443 


220010 




01444 


543261 




01445 


601451 


o 


01446 


203332 




01447 


340010 




01450 


601434 


o 








01451 


220010 




01452 


0600i4 


o 


01453 


440014 




01454 


440014 




01455 


440014 


o 


01456 


443252 




01457 


601425 


o 







o 
o 



o 
o 
o 
o 
o 

o 



SRC (,OAD PROGRAMS FQR INTERACTIVE MQOEi 



/EACH PROGRAM WIU TAKE 6 LOCATIONS IN BUFFERi ^ 

/THE FIRST TWO WJUL BE THE TITL,E, THE THIRD Wmt. BE THE STARTING BUQCK NUMBER, 

/THE FOURTH IS THE PROGRAH SIZE, THE FIFTH WILL BE THE I^OAP ADDRESS, 

/THE SIXTH WILL, BE A UOAD iNDICATQRi O 



/ 



LAC* 


13 


SNA 




JMP 


CHAIN 


SKP 




UAC« 


13 


PAC 


TEMPI?? 


DACfl 


14 


LAC* 


13 


OAC 


TEMP2# 


DAC» 


14 


LAC 


(pJRECTsl 


DAC 


10 


IAC« 


10 


SAD 


TEMPI 


JHP 


1*4 


LAC 


10 


TAD 


(000003 


JMP 


LOADRR' 


/ 




LAC» 


10 


SAO 


TEMP2 


^JMP 


• *4 


LAC 


(2) 


TAD 


10 


JHP 


tOADRK 


/ 




LAC-» 


10 


DAC« 


14 


ISZ 


14 


ISE 


14 


ISZ 


14 


ISZ 


PROCNT 


JMP 


LOADRP 


, EJECT 





/START OF ACTLST 



o 

L,OADRP LAC» 13 O 

/TEMPI AND TEMP2 CONTAIN THE TITLE 

/OF THE PROGRAM WANTED BY THE OPERATOR O 

o 

LQAORR DAC 10 " /NOW FjND THAT TITLE IN THE DIRECTORY 

/TO GET WORD COUNT AND THE STARTING 
/BLOCK NUMBER'i O 

O 
O 
O 

o 

o 



/A MATCH OCCURRED, NOW GET BLOCK NUMBER 



/DONE WITH ALL PROGRAMS? O 

/NO 

o 
o 
o 
o 
o 
o 

o 



o 
o 



o 

o 



o 
o 
o 
o 
o 
o 
o 

o 
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O /NOW GET ACTUAt. PROGRAM SJZE FROM THE PROGRAM, O 

/IT SHOULD BE THE FOURTH WORP ON THE TAPE, 

O 01460 203v5>i3 i,AC (BUFF*2 O 

03,461 0432v50 FIND,0 DAC Y^X 

01462 2232^0 t.AC* Xl 

O 01463 741200 SNA ' O 

01464 601501 JMP U0A0,t3 /DONE 

01465 040024 DAC BLKNUM 

O 01466 777774 UAW '4 U 

01467 040316 DAC READ+S 

01473 203316 UAC (OTBUFbI 

O 01471 040317 DAC READ*5 U 

01472 100314 JMS READ ~ /READ THE FIRST BLOCK OF THE PROGRAM 

O 01473 202531 LAC PTBUF+3 O 

01474 443230 IS2 >^i 

01475 063230 DAC» Xl 

O 01476 203230 LAC Xl O 

01477 343334 TAD (is 

01500 601461 JMP FiNDiW /GET NEXT PROGRAM ^ 

o ^ / ' ' ■ o 

/NOW SORT BUFFER ACCOHPING TO PROGRAM SHE 

O 01501 143236 LOAD,0 D2M SW{NP O 

01502 20333i? LAC (8UFF 

01503 043230 LOAD,! OAC Xi, /TITLE POJNTER 

O 01504 343325 TAD (3 O 

01505 043231 DAC X2 /PROGRAM SJZE POINTER 

01506 343325 TAD (3 _ 
O 01507 043232 DAC X3 /SECOND PROGRAM TITL^ POINTER O 

01510 343325 TAD U 

01511 043233 DAC X4 /SECOND PRpeRAM SI?E POINTER 
O .EJECT 



U 

O 
O 

o 
o 
o 
o 
o 

o 



o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 



o 



o 
o 
o 
n 
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01512 
01513 
01514 
01515 
01516 
01517 
01520 
01521 
01522 



31523 
01524 
01525 



01526 
01527 
01530 
01531 
01532 
^31533 
01534 
01535 
01536 
01537 
01540 
01541 
01542 
01543 

01544 
01545 



01546 
01547 
01550 



LOADER SRC 



223232 

74121^0 
601546 
223231 

740001 
343317 
363233 

7403^8 
601526 



203336 
343230 

601503 



777777 

043236 
777 7 72 

043242 
223230 
04323i 
223232 
063230 
203231 
063232 
443230 
443232 
443242 
601532 

203230 
601503 



443236 

741000 
601501 



/DONE WITH BUFFER 



LOAD PROGRAMS FOR {NTERAqTlVE MQDE, 

/CHECK FOR END OF BUFFER 
/ 
LAC« X3 

SNA 

JMP LOAD, 3 

LAC« X2 

CM A 

TAD U 

TAD« X4 

SMAIS2A 

JMP swnoH 

/NEGATIVE RESULT 30 JUST QHaNGE POINTER AND TRY AGAIN, 
/ 

LAC (6 
fAD U 
JMP LOAD, I 
/ 
/SWAP BECAUSE LARGER PROGRAH IS LQWE^R IN BUFFER 
/ 

«1 

SWIND 

n6 

CNTR 

XI 

X2 

X3 

Xl 

X2 

X3 

xi 

X3 

CNTR 
LOAD, 2 



SWITCH LAW 

OAC 

lAW 

DAC 
LOAD, 2 LAC* 

OAC 

LAC» 

DAC» 

LAC 

OAC» 

ISZ 

ISZ 

ISH 

JMP 

/ 

LAC XI 

4MP LOAD.l 

/ 
/CHECK FOR REVERSALS MADE IN SORT, 

/ 
LOAD, 3 ISZ SWiND 

SKP 

JMP LOAD,0 /ReVER??At MADE 00 BUFFER AGAIN, 

I E Jc^ c r 



/SWITCH DONE, TRY NEXT PROORAHS 



o 

o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 

o 



o 
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UOADE 


o 


aissi 


77777 




3i5&2 


043225 


o 






o 






o 








3.5SC5 


203335 


o 


03,5i?4 


043230 




01555 


343325 




01556 


043233 


o 


01557 


343317 




01560 


043234 




01561 


343317 


o 


01562 


043235 




01563 


223230 




01564 


741200 


o 


01565 


601623 




01566 


223235 




01567 


740200 


o 


01570 


601604 




01571 


203241 




01572 


503337 


o 


01573 


043226 




01574 


223233 




01575 


740001 


o 


01576 


343332 




01577 


343241 




01600 


043227 


o 


01601 


503337 




01602 


543226 




0160^ 


601607 


o 








01604 


203336 




01605 


343230 


o 


01606 


601554 




01607 


203227 


o 


01610 


34334 




01611 


741100 




01612 


60l6id4 


o 


01613 


343341 




01614 


043241 




01615 


063234 


o 


01616 


777777 




01617 


06323S 




01620 


343241 





01621 


043241 




01622 


601604 


o 






o 


- 





o 

o 



SRC LOAD PROGRAMS pOR J NTERACT J VE HODEi 



LAW "10 O 

DAC itRCNT /SET UP FOR ITERATJONS THROUGH LIST, 

/EACH PROGRAM WILU BE TESTED TO SEE IF IT CAN FIT IN THE REMAINING O 

/ROOM BETWEEN A POINTER SOMEWHERE IN A 4K PJELO AND THE BOTTOM 

/OF THAT 4K FIELD, IT'NO PROGRAM CAN FIT IN THE REHAINING SPACE 

/THE THE POINTER |S MOVED TO THE TOP OF THE NEXT LOWER 4K FJELPi O 

/EACH PROGRAM'IS THEN'TRIEO AGAIN UNTIL ALL PROGRAMS ARE LOADED, 

/OR THE TOP OF THE OPERATING SYSTEM IS REACHED, THEN NO MORE PROGRAMS CAN 



/BE LOADEDj 



COMPil 



/SUBTRACT PROGRAM SIZE PROM VOlQ 
/TEMP LOAD ADDRESS 



/DID NOT CROSS 4K BOUNDARY 

/WON»T LOAD, GET NEXT PROGRAM 

/CHECK TO SEE IP IT WJLL PIT ABOVE MONlTQRi 

/WON'T PIT 



QOMP,0 DAC XI /n CONTAINS ADDRESS OF TITLE WORD O 

/X4C0NTAINS THE ADDRESS OF THE PROGRAM SI^E 

/X£> CONTAINS THE ADDRESS OF THE LOAD ADDRESS 

/X6 CONTAINS THE ADDRESS OF THE LOAD INDICATOR O 

/ANYTHING LEFT IN LIST? 

/DONE WITH END OF LIST O 

/CHECK FOR ALREADY LOADEPi 

/LOADED O 

O 



LAC 


(BUFF 


DAC 


XI 


TAD 


(3 


DAC 


X4 


TAD 


u 


DAC 


X5 


TAD 


(1 


DAC 


X6 


LACa 


x| 


SNA 




^MP 


ENDLST 


LAC« 


X6 


S2A 




JMP 


COMP.i 


LAC 


CLDADH 


AND 


(070000 


DAC 


L0W4K~" 


LAC« 


^3 


CMA 




TAD 


(2 


TAD 


CL,DADR 


DAC 


TLAD 


AND 


(070000 


SAD 


L0W4K" 


JMP 


1*4 


/ 




LAC 


(6 


TAD 


xi 


JMP 


CpMP,0 


/ 




LAC 


TLAD 


TAD 


(a3400 


SPA 




JMP 


COMP.l 


TAD 


(3400" 


DAC 


CLDADK 


DAC» 


X5 


LAW 


«i 


DAC« 


X6 


TAD 


CLDADR 


DAC 


CLDADR 


JMP 


COMPii 



o 



o 
o 
o 
o 
o 



/THIS IS THE LOADING ADDRESS POR THIS PROGRAM, ^ 

/SET LOAD INDICATOR O 

O 

O 

o 



o 

o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 

o 
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LOADKR SRC 



LOAD PROGRAMS FOR INTERACTIVE MODEi 
•EJECT 



o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 

j 

I 

O 1 

o I 

i 

o 
o 
o 
o 
o 
o 

o 



o 

o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
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01624 
01623 
01626 
01627 
01630 
31631 
01632 



01633 
01634 

01635 
01636 
01637 
01640 
01641 

01642 
01643 
01644 

0164S 
01646 
01647 

01660 
016S1 
01652 



016S3 
016S?4 
01655 
01656 
01657 
01660 
01661 
01662 
31663 
01664 



tOAOEH SRC 



203241 
503337 
741200 
601633 
343342 
043241 
443225 
601553 



143224 
203335 
043230 
343317 
043231 
343343 
043235 

223230 
741200 
601665 
223235 
741200 
101653 
203230 
343336 
601635 



000000 
223230 
043221 
223231 

043222 
203344 
100460 
777777 
043224 
621653 



t,OAD PROGRAMS FOR INTERACTIVE MODEi 



/END OF LIST, MOVE TO TOP OF NEXT 4K BANK, 

/ 

CUPADK 



ENDLST LAC 
AND 
SNA 

JMP CL,0D,X''2 
TAD («1 
DAC CLDADR 
ISH {TRCNT 
JMP qOMP.W^l n\X> DONE 

/ 

/LAST ITERATION, SEE IF EVERY PROGRAM JS yOAOEO, 

/ 



D2M ALLPFG 

UAC (BUFF 

CLOD.l DAC Xi 

TAD (i 

DAC X2 

TAD (4 

DAC X6 
/ 

lAC* X3^ 
SNA 

,JMP UOADPG 

UAC« X6 

SNA 

JMS NQI^OAIJ 

UC XI 

TAD (6 

JMP Cl,00il 

/PRINT PROGRAM NAME THAT WAS NOT lOADEO, 

/ 
NOUOAD 

L.AC» 

DAC 

LAC» 

DAC 

LAC 

JMS 

UAW 

DAC 

.EJECT 



/AIL LOADED FLAG 
/SIT UP POINTERS, 



/DONE WITH LIST 

/SOME PROGRAM CAN NOT ^E LOADEDi 

/CHECK NEXT PROGRAM 



XI 

A" 

X2 

A*l 

(A«l*500000 

TSJXBT 

■ si 

ALLOFG 
NfJL'OAD 



/SET FLAG TO INDICATE THAT SOME PROGRAM WAS NOT LOADED 



u 

I 

o : 

o : 

! 

o 

o I 
o 
o 
o 

O \ 

I 

1 

o 

I 

o 
o 
o 
o 
o 
o 
o 
o 
o 
o 

o 



o o 

o o 

PAGE 14 UOADEH SRC t-OAD PROGRAMS FOR JNTERACTIVE MODE, 

O /LOAD PROGRAMS NOW O 

/ 

0166S 4432^^ UOADPG ISZ AL,l,Df'q 

O 01666 601672 JMP ,*4 " O 

01667 203345 l,AC ( NOF rrM'l*^00000 

01670 100460 JMS TSIXBT 

O 01671 6011!^0 JHP kUADER O 

f 

01672 g033^i5 l,AC (BUFF 

O »1673 043230 LOAD, 4 PAC XI O 

01674 343317 TAD (1 

01675 043231 DAC X2 

O 01676 3433i7 TAD (1 O 

C41677 043232 DAC X3 

01700 343332 TAD <2 

O 01701 043234 DAC t^ O 

01702 343317 TAD U 

01703 04323S DAC X6 

O / ~ o 

01704 223230 1,AC* X3, 

01705 741200 SNA 

O 01706 60l71Si JMP CHKCOH /AIL, QONE, CHECK FOR PRINT LINK TABUE, O 

01707 22323S LAC^t X6 

01710 7^0200 SZA 

O 31711 601747 UMP l,OAD,> /PROGRAM WAS LOADED, O 

01712 203230 NXTPRG lAC Xl 

01713 343336 TAD (6 

O 31714 601673 JMP tPAD,^ /GET NEXT PROGRAM O 



o 
o 
o 
o 
o 
o 
o 
o 
o 

o 



.EJECT 



o 
o 
o 
o 
o 
o 
o 
o 
o 

o 



u 
O 
O 
O 
O 

o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 

o 
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UDAOER SRC 


01715 


443246 


01716 


601721 


01717 


700312 


01720 


600122 


2)1721 


203346 


01722 


043230 


01723 


1001314 


01724 


223230 


01725 


7412^0 


01726 


601717 


01727 


343334 


01730 


040013 


01731 


2S3347 


01732 


040014 


01733 


220013 


01734 


060014 


0173S 


220013 


01736 


060014 


0173 7 


203347 


01740 


100460 


01741 


760240 


01742 


100522 


01743 


223230 


01744 


100540 


01745 


443230 


01746 


601723 



lOAD PROGRAMS FOR JNTERAQTIVE MODE, 



CHKCOR 
CHKRiZ 



CHKR,! 



IS2 


CORMAP 


JMP 


,*3 


KRB 




gMP 


G|TM0N*2 


/ 




lAC 


(St,lNK) 


DAC 


x"i 


sJMS 


CRLF 


l,AC» 


xi 


SNA 




JMP 


Qmu'4 


/ 




TAD 


(5) 


DAC 


1«J 


L,AC 


U^l) 


DAC 


l^ 


l,Aq« 


14 


DAC<* 


14 


IAC*» 


l5 


DAC« 


14 


lAC 


{A«l) 


JMS 


TS|XBT 


l,AW 


240 


UMS 


TYRONE 


UAC» 


Xi 


JMS 


PSOD 


ISH 


n 


JMP 


CHKRil 


,E,^ECT 





/SWITCH SET? 
/YES 

/NO RETURN TO MONITOR 



/DONE EXIT, 



O 

O 

o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 

o 



o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 



PAGE .1.6 

01747 
01750 
01751 
01752 

^51754 
017S5 
01756 
01757 
01760 
01761 
01762 
0176^5 
01764 
01765 
01766 
01767 
017 70 
01771 
01772 
01773 
01774 
01775 
01776 
01777 
02000 
02001 
02002 
02003 
02004 
02005 
02006 



LOADER SRC 

223234 

043241 
04325>5 
203271 
043251 
223232 
040024 
043264 
102007 
143240 
102036 
102062 
1B2036 
043243 
5032/6 
043245 
20324^ 
102236 
043243 
5032/6 
043244 
203243 
102236 
503276 
102122 
203244 
102122 
203245 
102122 
443266 
601763 
601761 



UOAD PROGRAMS FOR INTERACTIVE MODE 



LOAD, 5 



l,OADRW 



LAC^v 


X5 


DAC 


CUDADK 


DAC 


aUDADR 


lAC 


{7777 


DAC 


PGQRBK# 


LAC* 


X3 


DAC 


bCknum 


DAC 


UPDTBK# 


JMS 


READBK 


DZM 


CHKSUM# 


JMS 


GETWRb 


vIMS 


WPPAIR 


JMS 


GETWRD 


DAC 


CNTWDl* 


AND 


{77 


DAC 


c:ntwd3# 


LAC 


CNTWOi 


JMS 


KR0T6" 


DAC 


CNTWOI 


AND 


(77 


DAC 


CNTWD2# 


lAC 


CNTWDi 


JMS 


RR0T6" 


AND 


(77 


JHS 


INTPRT 


UAC 


CNTWD2 


JMS 


INTPRt 


UAC 


CNTWD3 


JMS 


INTPRT 


ISH 


NQCNTK# 


JMP 


tQA0RW*2 


JMP 


LOADRW 


, EJECT 





/SET TO PAGE MODE 



/UP DATED BI^OCK NUMBER 

/READ A 8!„0CK OF TAPE INTO MEMORY 

/GUAR CHECKSUM 

/GET FIRST WORD 

/IT HAS TO 9E A WqRO PAIR, INTERPRET IT 



u 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 

o 



o 






o 
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UOAUEH SF 


o 


3200 7 


000000 




02010 


7003il 




02B3.J, 


60201/ 


o 


02012 


700312 




232013 


543273 


o 


02014 


600120 




020iy 


54 3350 


o 


02016 


602032 




02017 


203264 




02020 


040024 


o 


02021 


443264 




02022 


777400 




02023 


043265 


o 


02024 


040316 




02025 


203316 




02026 


040317 


o 


02027 


040017 




02030 


100314 


o 


02031 


622007 




02032 


100271 




32033 


203351 


o 


02034 


100522 




02035 


601100 





02036 


0000k!0 




02037 


220017 




02040 


043254 


o 


02041 


343240 




02042 


043240 




02043 


443265 


o 


02044 


741000 




02045 


10200/ 




02046 


203254 


o 


02047 


622036 


o 


02050 


000000 




02051 
02052 


143246 

203275 


o 


02053 


622050 




02054 


203307 


o 


02055 


741000 




02056 


203271 




02057 


043251 


o 


02060 


102036 




02061 


622122 


o 






o 






o 







UOAD PROGRAMS FOR |NTERAQTIVE HOpE, 



READBK 



READBJ, 



GETWRO 



CORE 



bkmope 

PGHOPE 





KSF 

JHP 

KRB 

SAD 

gMP 

/ 

SAD 

JMP 

/ 

LAC 

OAC 

IS2 

LAW 

DAC 

DAC 

UAC 

OAC 

DAC 

JMS 

JMP* 

/ 

JMS 

(-AC 

JMS 

JMP 

/ 



lACtt 

DAC 

TAD 

DAC 

IS2 

SKP 

JMS 

UAC 

JMPi> 

/ 

/ 



D2M 

UAC 

JMP« 

UAC 
SKP 
UAC 

DAC 
JMS 
JMP» 
.EJECT 



,*6 

(203) 
GETMON 

(220) 

READBl 

UPDTBK 

buknum 

UPDTBK 

b400 
WDCNTH# 

READ+2 

(DTBUNl 

READ+3 

Vf 

READ 

READBK 

UPAROW 
(320)' 
TYPQNE 
UdADEK 



17 

SfRG# 

CHKSUM 

UHKSUM 

WOCNTK 

READBK 

STRG 

GETWRP 



CQRMAP 
(2155" 

CQRE 

(1777/ 

(7777 

PGORBK 
GETWRU 

INTPRf 



/READ A OUOCK FROM DECTAPE 
/DEC TAPE HANPUER 



u 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 

o 



o 
o 



O 02062 000^00 WOPAIR 

AND (3770630 /MASK OFF ALL. BITS EXCEPT WORD PAIR COUNT 

OIL 
O 0206^ 7421^20 RTR 

RTR 

UMS RR0T6 
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L,OADE 


02062 


000000 


02063 


5303352 


02064 


744000 


0206^ 


742020 


02066 


742020 


02067 


102236 


02070 


740001 


02071 


343317 


02072 


043266 


0207.5 


2032134 


02074 


503353 


02075 


543334 


020/6 


602101 


02077 


102036 


023.00 


622062 


02101 


102036 


02102 


203240 


02103 


741200 


02104 


601712 


02105 


203354 


02106 


100460 


02107 


223230 


02110 


043221 


02111 


223231 


02112 


043222 


02113 


203347 


02114 


100460 


02115 


700312 


02116 


600122 


02117 


000000 


02120 


000000 


02121 


000000 


02122 


000000 


02123 


543332 


02124 


602143 


02125 


543325 


02126 


602163 


02127 


543343 


02130 


602173 


02131 


543334 


02132 


602175 


02133 


543355 


02134 


602200 


02135 


543356 


02136 


602054 


02137 


543357 


02140 


602056 


02141 


102036 


02142 


622122 



SRC |,OAD PROGRAMS FOR INTERACTIVE MODE, 



JMP GETMON+2 
/ 



O 02117 000000 P8UFF 




O / 



JNTPRT 

SAD (000002 



O .EJECT 

O 

o 



JMS GETWRP 

JMP» INTPRT /DON'T tOAD ANYTHING 



o 
o 
o 
o 
o 



O 02070 740001 CMA 

TAD (000001 

„ OAC WQCNTR ^ 

O 02073 203254 l,AC STRG ' /NOW CHECK FOR END OF FILE O 

AND (000007 

SAD (000005 

O 020/6 602101 JMP 1+3 ~ O 

JHS GETWRD 

-„„.„.- .. JMP<* WPRAIK 

O 02101 102036 JMS GETWRU /END OF FILE* GET NEXT WORD WHICH O 

l,AC CHKSUM /WILL 0E PARITY AND CHECK OVERALL PARITY 

SNA " ^ 

O 02104 601712 gMP NXTPRG /GET NEXT PROGRAM O 

LAC (CHKSRa«l*400000 /CHECK SUM ERROR 

-^^-^ - JMS TSJXBT " 

O 02107 223230 l,AC» Xi /GET TITLE O 

DAC A" 

LAC» X2 

O 02112 043222 DAC A-*^^ 

LAC (A'T'l 

^MS TSJXBT 
O 02115 700312 KR8 



O 
O 
O 
O 



O 532124 602143 gMP LPAOP" /LOAD ADDRESS IN ,REL FORMAT O 

SAD (000003 

MP KCoiNS /RELOCATABLE INSTRUCTION ^ 

O 02127 543343 SAD (000004 O 

gMP CONST' /CONSTANT 

SAD (000005 

O 02132 602175 JMP APPNTR /ADDRESS POINTER O 

SAO (000027 

uIMP SA ■ ■ /STARTING ADDRESS _ 

O 02135 543356 SAD (000031 O 

JMP BKMODt /SET TO BANK MODE RELOCATABLE 

. SAD (000032 

O 02140 602056 JMP PGMODE /SET TO PAGE MOQE RELOCATABLE O 



O 

o 

o 



o 
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UOAUE 


o 


0^143 


1K2036 




02144 


7411(dK 




02145 


602151 


o 


02146 


343241 




02147 


43253 




021t?0 


622122 


o 








021&1 


203360 




02152 


100460 


o 


021133 


223230 




021tJ4 


043221 




02155 


223231 


o 


02156 


043222 




02157 


203347 




02160 


100460 


o 


021&1 


700312 




32162 


600122 


o 


02163 


102W36 




02164 


043257 




02165 


2S3241 


o 


02166 


503251 




02167 


343257 




02170 


063253 


o 


02171 


443253 




021/2 


622122 


o 


02173 


102036 




02174 


602170 


o 


02175 


102036 




02176 


343241 




02177 


602170 


o 








022^0 


203346 




02201 


043257 


o 


02202 


223257 




32203 


741200 




022J!!4 


602207 


o 


02205 


443257 




02206 


602202 




02207 


102036 


o 


02210 


343241 




02211 


063257 




02212 


622122 


o 






o 













o 






o 







SRC LOAD PROGRAMS FOR JNTEHACTIVE MQDE, 



O 

o 



LOADD JMS GETWRP O 

SPA 

JMP iPAUPt /ERROR 

TAD CLDADR /APO TO POINTER O 

DAC SUDADR 

JMP» INTPHt 

/ 

l^DADPE UAC (L,CMSG»1*400000 /ERROR 

JMS TSJXBf 

UC» XI 

DAC A 

l-,AC« X2 

DAC A*l 

LAC (Asi 

JMS TSJXBT 

KR8 

JMP GETMON+2 



JMP« JNTPRT 
, EJECT 



o 
o 
o 
o 



/ 

RLOINS JMS GETWRO /GET THE INSTUCTION O 

DAC TEMPER /THAT HAS TO HAVE 

LAC CLDAPR /THE ADDRESS PORTION 

AND PG0R(3K /MODIFIED, O 

TAD TEMPE ' 

OAC» SLDADK 

IS2 5LDADR O 

JMP» INTPRf 

/ 

CONST JMS GETWRD /CONSTANT SQ JUST O 

JMP ,«4 /PLAGE IN MEMORY 

/ 

ADPNTR JMS GETWRU /ADDRESS POINTER O 

TAD CLOAOH 

JMP i"? 

/ 

SA LAC ^SLINK /PUT THE STARTING ADDRESS 

DAC TEMPE /OF THE PROGRAM IN AN 



O 



LAC» TEMPE /EMPTY SLOT OF SYSTEM O 

SNA /LINK TABLE 

JMP ,*3 

IS2 TEMPE O 

JMP i«4 

JMS GETWRU 

TAD CLDADR O 

OAC« TEMPE' 



O 
O 
O 
O 

o 



u 
o 
o 
o 
o 
o 
o 
o 

•0 

o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 

o 



age: 20 


1.0APEK SRC 


2213 


0001^00 


02X14 


043255 


7jZ2X5 


203222 


0H216 


744013 


02217 


100533 


02220 


043260 


02221 


740020 


02222 


503277 


0222v5 


243255 


02224 


043222 


02225 


203260 


02226 


503276 


02227 


043260 


02230 


203221 


022^1 


100533 


02232 


503277 


02233 


243260 


02234 


043221 


02235 


622213 


02236 


000000 


02237 


742020 


02240 


742020 


02241 


742020 


02242 


622236 


02243 


000000 


0224 4 


143262 


02245 


503276 


02246 


740200 


3224 7 


602255 


02250 


760260 


02251 


100522 


322p2 


760260 


02253 


100522 


02254 


622243 


02255 


343361 


02256 


741100 


02257 


602262 


02260 


443262 


02261 


602255 


02262 


043263 


02263 


203262 


02264 


343362 


02265 


100522 


02266 


203263 


02267 


343363 


02270 


343362 


02271 


100522 


02272 


622243 



LOAD PROGHAMS FQH INTERACTIVE MODE, 



OBPRSL 



RROT§ 



PR2DD 








DAC 


TEMP# 


(.AC 


B 


mi 




JMS 


LK0T6 


DAC 


TEMPlff 


RAR 




AND 


(7777»0 


XOR 


TEMP 


OAC 


B" 


UAC 


TEMPI 


AND 


{77 


DAC 


TEMPI 


UAC 


a' 


JMS 


LRQT6 


AND 


< 77771^0 


XOR 


TEMPI" 


DAC 


A"' 


.JMP« 


OBPRSL 


/ 









RTR 




RTR 




RTR 




JMP» 


RRQT6 


/ 









D^M 


TENS# 


AND 


(000^7 7 


S2A 




vJHP 


1*6 


LAW 


260 


JHS 


TYPONE 


L,AW 


260 


JMS 


TYRONE 


JMP» 


PR2DD~ 


TAD 


(«a,2 


SPA 




JMP 


,*3 


ISZ 


TENS 


JMP 


,,4 


DAC 


UNJTSP 


UC 


TENS 


TAD 


(260 


JMS 


TYPONE 


LAC 


UNITS" 


TAD 


(12 


TAD 


(1^60 


JMS 


TYPONE 


JMP* 


PR200 



.EJECT 



/DOUBLE PRECISION SHIFT LEFT 
/FOR SIX 6 8|f CHOPPED ASCII 



ROUTINE 
CHARACTERS 



/SHIFT AC 6 PLACES TO RICHT 



/PRINT TWO DECIMAL DIGITS UP TO ^1 



o 

o 

o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 

o 



o 
o 








PAG!-: 23, 


UOAOE 


o 


0227 3. 


00000 




3227 4 


760334 




02275 


100t322 


o 


022 76 


2^3222 




0227 7 


745200 




02300 


602321 


o 


0230J, 


5!33277 




02302 


102236 




02303 


343222 


o 


02304 


203221 




023fc?!iJ 


741200 




02306 


602321 


o 


0230 7 


744020 




02310 


102236 




02311 


043221 





02312 


503364 




32313 


243222 




32314 


043222 


o 


32315 


203221 




02316 


740010 




02317 


503271 


o 


02320 


043221 




02321 


203237 




02322 


543365 


o 


02323 


602327 




02324 


Tiiin 




02325 


343237 


o 


02326 


043237 




02327 


622273 



SRC 



LOAD PROGRAMS FOR INTERAQTIVE MODE, 



O 



o 



o 
o 
o 
o 



o 



o 
o 

o 



DSPRSR 



t,OADRM 



CLL 





UAW 

JMS 

UAQ 

SNA I 

4MP 

AND 

JMS 

DAC 

I.AC 

SNA 

JMP 

RCR 
JMS 
DAC 
AND 
XOR 
DAC 
LAC 

RAL 

AND 

DAC 

LAC 

3AU 

vIMP 

LAW 

TAD 

DAC 

JMP» 

.EJECT 



01:30334 
TYPONE 
B ■ 

LDADRM 

Kinim 

RR0T6~ 

B 
A 

LOADRM 

RR0T6 
A 

vnmm 
u' 

8 

A 

a' 

CARCNT 
C'^7 

1*4 
■■«1 

CARCNT 
CARCNT 
OBPRSR 



/REPLY WITH BACK SLASH AND PERFORM 
/A DOUBLE PRECISION SHIFT RICHT 
/WITH THE SIX CHOPPED aScU 
/BYtES, THEY ARE JN LOCATIONS "A" AND 
/"B", THE FORMAT IS Ali A2| A3|B1,B2,B3, 



u 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 

o 



(J 

o 
o 
o 
o 
o 
o 
o 
o 
o 
o 



o 



o 
o 
o 
o 
o 
o 
o 
o 
o 

o 
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LOAPEH 


SRC 


02330 


000000 




02331 


000000 


OR 


02332 


000000 


«R 


02333 


000000 


^R 


02334 


000000 


«R 


02335 


000000 


«R 


02336 


000000 


«R 


02337 


000000 


*R 


02340 


000000 


»R 


02341 


000000 


i>R 


02342 


000000 


»R 


02343 


000000 


»R 


02344 


000000 


«R 


02345 


000000 


<*R 


02346 


000000 


*R 


02347 


000000 


«R 


023130 


000000 


i»R 


02351 


000000 


<>R 


023^2 


000000 


«R 


023SJ3 


000000 


i>R 


02354 


000000 


<iR 


02355 


0000 00 


WR 


02356 


000000 


<>H 


02357 


000000 


<>R 


02360 


00000 


<^R 


02361 


000000 


ttR 


02362 


000000 


«R 


02363 


000000 


«R 


92364 


000000 


^^R 


02365 


000000 


«R 


02366 


000000 


«R 


02367 


000000 


«R 


023/0 


000000 


«R 


02371 


000000 


iiR 


02372 


000000 


«R 


02373 


000000 


ttR 


02374 


0000^0 


ftR 


02375 


000000 


^^R 


023/6 


000000 


«R 


0237 7 


000000 


<>R 


02 4^50 


000000 


»R 


02401 


000000 


WR 


024W2 


000000 


»R 


02403 


000000 


*R 


02404 


000000 


WR 


02405 


000 000 


iiR 


02406 


000000 


«R 


02407 


000800 


*R 


02410 


000000 


OR 


02411 


000000 


«R 


02412 


000000 


<>R 


02413 


000000 


«R 



tOAD PROGRAjiS FOR INTERACTIVE MODE, 

,REPT 176 
BUFF 



u 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 

o 



o 

o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 

o 



PACE 



26 


UOAUEK 


SRC 


02414 


0000 


«R 


024iy 


000000 


<>R 


02416 


000000 


«R 


S2417 


000000 


ftR 


02420 


000000 


«R 


02421 


000000 


«R 


02422 


000000 


«R 


02423 


000000 


«R 


02424 


000000 


«R 


02425 


000000 


»R 


02426 


000000 


»R 


242 7 


000000 


«R 


024^0 


000000 


«R 


024^1 


000000 


«R 


02 4;52 


000000 


<VR 


024;5s5 


000000 


»R 


02434 


000000 


aR 


02435 


000000 


ttR 


02436 


000000 


ttR 


02437 


000000 


«R 


02440 


000000 


m 


02441 


000000 


«R 


02442 


000000 


4>R 


02443 


000000 


«R 


024 44 


000000 


<>R 


02445 


000000 


ttR 


02446 


000000 


«R 


02447 


000000 


*R 


02450 


000000 


«R 


02451 


000000 


<>R 


02452. 


000000 


«R 


02453 


000000 


*R 


02454 


000000 


«R 


02455 


000000 


«R 


02456 


000000 


«R 


02457 


000000 


<*R 


02460 


000000 


«R 


02461 


000000 


ftR 


02462 


000000 


WR 


02463 


00 000 


»R 


02464 


00 0000 


*R 


02465 


00000 


«R 


02466 


00000 


*R 


02467 


000000 


*R 


02470 


000000 


»R 


02471 


000000 


«R 


02472 


000000 


»R 


02473 


000000 


«R 


02474 


300000 


#R 


02473 


000000 


ftR 


02476 


800000 


ftR 


02477 


000000 


■:>R 


02500 


00000 


<*R 



t,OAD PROGRAMS FOR JNTEHACTIVE MODE, 



O 

■ o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 

o 



'-y' 



o 



o 



u 



o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 

o 



PAGE 



2^ 


lOADEH 


SRC 


02501 


I;i000y0 


»R 


025«2 


00001^0 


«R 


/)2i?0v3 


0000k;0 


OR 


3251^4 


000000 


ttR 


02S05 


000000 


»R 


02tJ06 


000000 


»R 


02507 


000000 


OR 


32510 


000000 


<>R 


025H 


000000 


OR 


02512 


000000 


flR 


0251w5 


000000 


«R 


02514 


000000 


«R 


02515 


000000 


<>R 


02516 


000000 


«R 


02517 


000000 


«R 


02520 


000000 


flR 


02521 


000000 


»R 


02522 


000000 


«R 


02523 


000000 


«R 


02524 


000000 


«R 


02525 


000000 


»R 



l^OAD PROGRAMS FOR INTERACTIVE MODE 



,E^ECT 



o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 

o 



o 
o 
o 
o 
o 
o 
o 



o 



o 
o 
o 
o 
o 



o 



o 
o 
o 
o 
o 
o 

o 
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UQAUEK 


SRQ 


02S>;?6 


000000 




02527 


000000 




02530 


000000 


■>R 


02^'SX 


000000 


<in 


d2^62 


0B00O0 


HR 


02S33 


000000 


«R 


02534 


000000 


*R 


02535 


000000 


«R 


02536 


000000 


«R 


02537 


000000 


HR 


02540 


000000 


«R 


02541 


000000 


HR 


02542 


000000 


WR 


02543 


000 


«R 


02544 


000000 


m 


02545 


000000 


»R 


02546 


000000 


ttR 


02547 


000000 


»R 


02550 


000000 


«R 


02551 


000000 


<*R 


02552 


000000 


^^R 


02553 


000000 


*R 


02554 


000000 


«R 


02555 


000000 


»H 


02556 


000000 


«R 


02557 


000000 


«R 


02560 


000000 


«R 


02561 


000000 


«R 


02562 


000000 


«R 


02563 


000000 


«R 


02564 


000000 


«R 


02565 


000000 


i^R 


02566 


900000 


«R 


02567 


000000 


«R 


02570 


000000 


OR 


02571 


000000 


*R 


02572 


000000 


*R 


02573 


00000 


»R 


02574 


000000 


ttR 


02575 


000000 


ttR 


02576 


000000 


«R 


02577 


000000 


<tR 


02600 


000000 


aR 


02601 


000000 


«R 


02602 


000000 


«R 


026k53 


000000 


*R 


02604 


000000 


«R 


02605 


000000 


OR 


02606 


000000 


«R 


02607 


000000 


ftR 


02610 


000000 


OR 


02611 


000000 


OR 



UOAD PROGRAMS FOR INTERACTIVE MODE, 



PT8UF 



,REPT 377 





o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 

o 



o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 



o 



o 

o 
o 
o 

o 



PAGt 



26 


LOAUf-:R 


SRC 


02612 


000 00 


«B 


02613 


000000 


ttR 


02614 


000009 


»R 


32615 


000000 


«R 


02616 


000000 


»R 


02617 


000000 


ftR 


02620 


000000 


«R 


02621 


000000 


ttR 


02622 


000000 


»R 


02623 


000000 


»n 


02624 


000000 


ftR 


02625 


000000 


ttR 


02626 


000000 


OR 


02627 


000000 


<^R 


02630 


000000 


»R 


02631 


000000 


»R 


02632 


0000 00 


»R 


02633 


000000 


<»R 


02634 


000000 


WR 


02635 


000000 


ftR 


02636 


000000 


«R 


02637 


000000 


«R 


02640 


000000 


*R 


02641 


000000 


«R 


02642 


000000 


«R 


02643 


000000 


■»R 


02644 


000000 


ttR 


02645 


000000 


ttR 


02646 


000000 


ttR 


02647 


000000 


ttR 


02650 


000000 


ttR 


02651 


000000 


ttR 


02652 


000000 


ttR 


02653 


000000 


ttR 


02654 


000000 


«R 


02655 


000000 


ttR 


02656 


000000 


«R 


02657 


000000 


ttR 


02660 


000000 


«R 


02661 


000000 


ttR 


02662 


0000Sii0 


ttR 


32663 


000000 


ttR 


32664 


000000 


»R 


02665 


000000 


ttR 


02666 


S>i00000 


ttR 


02667 


000000 


»R 


02670 


000000 


»R 


02671 


000000 


ttR 


02672 


000000 


ttR 


02673 


000000 


ttR 


026/4 


000000 


«R 


02675 


(J00000 


ttR 


02676 


000000 


ttR 



UOAD PRQGHAMa FOR INTERACTIVE MODE, 



o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 

o 



o 

o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 

o 



PAGE 27 


UOAUER 


SRC 


0267 7 


000000 


<tR 


02700 


000000 


•»R 


02701 


000000 


*R 


32702 


000000 


«R 


02703 


000000 


*R 


02704 


000000 


<*R 


32705 


000000 


»R 


02706 


300000 


»R 


02707 


000000 


ttR 


02710 


000000 


«R 


02711 


900000 


»R 


02712 


£4 


«R 


02713 


00 000 


»R 


02714 


000000 


«R 


02715 


000000 


«R 


02716 


000000 


«R 


0271/ 


000000 


«R 


02720 


000000 


*R 


02721 


000000 


an 


02722 


000000 


»R 


02723 


00001^0 


*R 


02724 


000000 


»R 


02725 


000000 


»R 


02726 


000000 


»R 


02727 


000000 


»R 


02730 


000000 


»R 


02731 


000000 


«R 


02732 


000000 


»R 


02733 


000000 


ftR 


02734 


00 0000 


»R 


02735 


000000 


»R 


02736 


000000 


«R 


02737 


000000 


«R 


02740 


000000 


«R 


02741 


000000 


«R 


02742 


000000 


<iH 


02743 


000000 


«R 


02744 


00 0000 


ftR 


02745 


000000 


ftR 


02746 


000000 


ftR 


02747 


000000 


ftR 


02750 


000000 


ttR 


02751 


000000 


«R 


02752 


000000 


»R 


02753 


000000 


»R 


02754 


000000 


»R 


02755 


000000 


<1.R 


32756 


000000 


*R 


02757 


000000 


«R 


02 7 60 


000000 


OR 


02761 


000000 


<>R 


02762 


000000 


«R 


02 763 


00000 


ttR 



l,OAQ PROGRAMS FOR INTERACTIVE MODE, 



u 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 

o 



u 



o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 

o 



PAGE 



26 


LOAOPH 


SRC 


02764 


000000 


ftR 


02765 


000000 


»R 


2 76 6 


000000 


«R 


02767 


000000 


«R 


02770 


000000 


OR 


02771 


000000 


m 


02772 


000000 


*R 


02773 


000000 


«R 


02774 


000000 


«R 


927 7 S 


000000 


«R 


027/6 


000000 


rtR 


02777 


00 0000 


«R 


03000 


000000 


«R 


03001 


0000W0 


»R 


03002 


000000 


ttR 


03003 


000000 


ttR 


03004 


000000 


<>R 


03005 


000000 


ftR 


03006 


00000S 


ftR 


S:5&i57 


000000 


•»R 


'^3010 


000000 


«R 


33011 


000000 


«R 


03012 


000000 


«R 


33013 


000000 


»R 


03014 


000000 


»R 


03015 


00000 


«R 


03016 


000000 


«R 


03017 


000000 


<VR 


03020 


000000 


<iR 


03021 


B00000 


HR 


03022 


000000 


*R 


03023 


000000 


i»R 


03024 


000000 


«R 


03025 


030000 


<>H 


03026 


000000 


ftR 


03027 


000000 


ttR 


03030 


000000 


<fR 


03031 


000000 


ItR 


03032 


000000 


«R 


03033 


000000 


ftR 


03034 


000000 


ftR 


03035 


000000 


ftR 


03036 


000000 


ftR 


03037 


000000 


«R 


03040 


000000 


ftR 


03041 


000000 


ftR 


03042 


000000 


ftR 


3043 


000000 


ftR 


03044 


000000 


ftR 


3045 


000000 


»R 


03046 


000000 


ftR 


3047 


000000 


ftR 


03050 


000000 


ftR 



UOAD PROGRAMS FOR INTERACTIVE MODE, 



u 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 

o 



o 

o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 

o 



PAGE 29 


i,,oade;k 


SRC 


30!p1 


00000 


ftR 


030!32 


000000 


»R 


0v5fc)b3 


000000 


ttR 


0:50i)4 


000000 


»R 


03055 


000000 


»R 


?Jv50S6 


000000 


«R 


00057 


00000 


«R 


03060 


000000 


«R 


03061 


000000 


«R 


03062 


000000 


«R 


33063 


000000 


OR 


03064 


000000 


«R 


03065 


000000 


«R 


03066 


000000 


«R 


030 6 7 


000000 


«R 


03070 


000000 


OR 


03071 


000000 


*R 


03072 


000000 


ftR 


03073 


000000 


»R 


03074 


000000 


^H 


03075 


000000 


»R 


03076 


000000 


i>R 


3307 7 


000000 


ftR 


03100 


000000 


«R 


03101 


000000 


«R 


03102 


000000 


WR 


03103 


000000 


s^R 


03104 


000000 


»R 


03105 


000000 


ttR 


03106 


000009 


»R 


03107 


000000 


«R 


03110 


000000 


«R 


03111 


000000 


ttR 


03112 


000000 


ttR 


03113 


000000 


<*R 


03114 


000000 


i^R 


03115 


000000 


*R 


03116 


000000 


«R 


03117 


000000 


i*R 


03120 


000000 


»R 


03121 


000000 


ftR 


03122 


000000 


«R 


03123 


00 


ftR 


03124 


000000 


«R 


03125 


000000 


»R 



tOAD PROGRAMS FOR INTERACTIVE MODE, 



,EUECT 



u 
o 
o 
o 
o 
o 
o 
o 
o 



o 



o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 

o 



o 

o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 



o 



o 

o 



PAGE 30 



LOAUKH SRC 



03126 


233123 


031^^7 


240515 


03130 


401417 


03131 


010405 


03132 


224026 


03133 


620200 


03134 


150515 


03135 


231132 


03136 


054040 


03137 


243120 


031^0 


054070 


03141 


135463. 


03142 


621354 


03143 


616613 


03144 


546260 


03145 


135462 


03146 


641354 


0314 7 


627013 


031iJ0 


541722 


031!3l 


406362 


031!32 


137240 


031S3 


400000 


03154 


271001 


03159 


2477S^8 


03156 


161724 


0315 7 


401116 


03160 


400411 


03161 


220503 


03162 


241722 


03163 


310000 


03164 


051624 


03165 


052205 


03166 


04 0000 


03167 


161724 


03170 


401417 


03171 


010405 


03172 


040000 


03173 


241124 


03174 


140540 


03175 


000000 



tOAD PROGRAMS FOR INTERACTIVE; MODE, 
TSYSID iSIXBT 'SYSTEM UQADER ySB^" 



TMEMSZ ,SIXBT 'MEMS,I,HE TYPE 8Ki 12K rUK, 20Ki 24K, 28K, OR 32KJ I5>' 



WHAT ,SIXBT 'WHAT?@' 

NOTIN jSIXBT |NQT I.N DIRECTORY!?).' 



REDUN iSIXBT 'ENTEKEDg!' 



NOFITH .SIXBT 'NOT lOADEDpi 



TITLE .SIXBT 'IITl,e^' 



.EJECT 



u 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 

o 



o 








PAGE 31 


l,OAUE 


o 


03176 


031 was 




03177 


3134 




03200 


232i?l& 


o 


03201 


400t>22 




03202 


221722 




03203 


401/16 


o 


03204 


401417 




03205 


010411 




03206 


160740 


o 


'/J320 7 


000000 




03210 


111414 




03211 


050701 


o 


03212 


144S!)i>6 




03213 


I417k)3 




03214 


402324 


o 


03215 


012405 




03216 


158^16 




B3217 


244fc3il 


o 


03220 


164^^0 


o 






o 






o 






o 






o 






o 






o 






o 






o 






o 






o 






o 






o 







SRC L,OAD PROGRAMS FOR INTERACTIVE MODEi 

CHKSRl .SIXBT 'CHECK SUM ERROR ON UOADING @.» 



I^CHSG , SIXBT M,|,LEGAl ,1,00 STATEMENT JN Si' 



.EJECT 



o 
o 
o 
o 
o 
o 
o 
o 
o 



o 



o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 

o 



o 








o 
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LOAUEH 


SRC !,OAD PROGRAMS 


o 


0;5221 


0t;0000 


A 




0^5222 


l;5 U 


B 




03223 


0k'0Wy0 





o 


0.522 4 


030000 


ALLDFG 




03225 


000000 


ITRCNT 




03226 


000000 


L,0W4K 


o 


03227 


00 


TLAO 




03230 


000000 


XI 




03231 


080000 


X2 


o 


03232 


000000 


X3 




03233 


000000 


X4 




05234 


000000 


X5 


o 


03235 


000000 


X6 




03235 


800000 


SWIND 

.EJECT 


o 








o 








o 








o 








o 








o 








o 








o 








o 








o 








o 








o 








o 








o 








r^ 









FOR JNTEPACTIVE MODE, 



o 

I 
o 

o 

o 

o I 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 
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o 
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o 
o 
o 
o 



33 


LOADER 


SRC 


I^OAQ PROGRAM 




000000 




.END 


03267 


0007;? i? 


*l 




33270 


003X21? 


»L 




032/1 


mini 


*U 




032/2 


403133 


»l. 




832/3 


000203 


«L, 




03274 


0003/7 


**l 




03275 


00021S 


«t. 




03276 


mmii 


»L 




03277 


llllMi 


^L, 




03300 


007013 


«l 




B3301 


616213 


^'L 




033KI2 


616613 


''I 




03303 


626013 


«l. 




03304 


626413 


f>L 




03303 


627013 


«U 




03306 


636213 


*L, 




03307 


%xini 


<»1, 




03310 


d27iri 


*L, 




03311 


'mill 


^l. 




03312 


%^iiii 


n. 




03313 


i^'^iiii 


«L, 




03314 


Qbllll 


<*i 




03315 


rniii 


^^ 




03316 


002S?2S 


^>i 




03317 


000001 


«i 




03320 


403172 


*L, 




93321 


0003/5 


«U 




03322 


0003/6 


«l 




03323 


4031S3 


*»l. 




03324 


000S64 


*L 




03323 


000003 


^*l, 




03326 


403163 


*l. 




03327 


000037 


*L 




03330 


4031135 


«L. 




03331 


00232/ 


«l. 




3332 


000002 


''I 




03333 


002^>^2 


^i. 




03334 


000005 


^■'t. 




03335 


002330 


^l 




03336 


000006 


»l 




0333 7 


070000 


*l. 




03340 


774400 


'^l 




03341 


003400 


«U 




03342 


7777/7 


*l« 




03343 


000004 


*»u 




03344 


40321^0 


»L 




03345 


4 03166 


»L 




33346 


000756 


**l. 




03347 


003220 


«L 




03350 


000220 


<'L 




033S1 


000320 


«L 




033S>2 


3/700 


<*U 
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o 
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1.0.AUEH 


SRC 


03353 


00!i3iiia/ 


«l. 


03354 


4031/i3 


«u 


333&y 


iidd^ZV 


«l. 


033S6 


000031 


»l 


033S7 


000032 


«l 


03360 


4032^7 


«L, 


03361 


777766 


^l 


0336;:^ 


000260 


«!, 


03363 


000012 


«l. 


03364 


7700i<J0 


^l 


03365 


77777% 


K 




SliZ 


=03377 



LOAD PROGRAMS FOR INTERACTIVE MODE 



NO ERROR l,INES 



u 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 

c 



i I 



o 
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)5 LOAQEH SRC 


1.0AD 


PROGRAMS FOF 


i INTERACTIVE MODE, 




o 


A 


03221 


ACTLST 


002526 


ADPNTR 


02175 


ALLDFG 


03224 




li 


03222 


BKMODE 


02054 


B^KNUM 


000024 


BUFF 


02330 




CARCMT 


3 237 


CHAIN 


000247 


CHKCOR 


"01715 


CHKR,1 


01723 


o 


CH!<R,2 


01717 


CHKSRl 


03176 


CHKSUM 


03240 


Ct,PADR 


03241 




CUOD.l 


01635 


CNTR 


03242 


CNTWDl 


03243 


CNTWP2 


03244 




CNTWD3 


03245 


COMP,0 


01554 


C0HP,1 


01604 


CONST 


02173 


o 


CORE 


02050 


CORMAP 


03246 


CRLF 


000514 


DBPRSl, 


02213 




POPRSR 


02273 


DIRECT 


000565 


PMEMSZ 


'03247 


DT8UF 


02526 


,f^ 


EBA 


707764 


EEM 


707702 


ENPl,ST 


01623 


FiND,0 


03.461 


u 


GETMON 


000120 


GETWRD 


02036 


INTPRT 


02122 


ITRCNT 


03225 




ITS12K 


01220 


ITS16K 


01222 


ITS20K 


01224 


ITS24K 


01226 




ITS28K 


01230 


ITS32K 


01232 


ITS9K 


01216 


KRB 


700312 


o 


KSF 


700311 


LCMSG 


03210 


kPADP 


02143 


LPADDE 


03151 




LOAPER 


01100 


COADPG 


01665 


tOAPRA 


01142 


LOADRB 


01160 




UOADRC 


01170 


L,OAPRP 


01233 


I^OAPRE 


01313 


Cpaprf 


01264 


o 


L,OAl.)RG 


01252 


lOADRJ 


01330 


l,OADRK 


01347 


UPADRI, 


01374 




LOADRM 


02321 


LOADRN 


01403 


I^PAPRP 


01425 


LOADRR 


01434 




tOADRW 


01761 


LOAD,0 


01501 


U0AP,1 


01503 


LOAD,? 


01S32 


o 


LQAf),2 


01546 


U0AD,4 


01673 


l.0AP,5 


01747 


LOAD, 6 


01134 




L0W4K 


G3226 


LRQT6 


000533 


NOFITM 


03167 


NOLOAD 


01653 




NOT IN 


03156 


NOTIND 


01400 


NUM ■ 


03250 


NXTPRG 


01712 


o 


PPUFF 


02117 


PGMODE 


02056 


PGORBK 


03251 


PROCNT 


03252 




PR3DD 


02243 


PSQO 


,000540 


READ 


00033,4 


READBK 


02007 




READBl 


02032 


REOUN 


03164 


RLQINS 


"02163 


RR0T6 


02236 


o 


SA 


02200 


SLDADR 


03253 


SLINK 


000756 


STRG 


03254 




SWIMD 


03236 


SWITCH 


01526 


TEMP 


'03255 


TEMPA 


03256 




ti:hpe 


03257 


TEMPI 


03260 


tEHP2 


03261 


TENS 


03262 





TITLE 


03173 


TUAO 


03227 


TMEMSZ 


03134 


TSIXBT 


000460 




TSYSLU 


03126 


TYPONE 


000522 


UNITS 


03263 


UPAROH 


000271 




UPOTBK 


03264 


UPREFX 


000560 


WAlt 


000253 


WDCNTR 


03265 


o 


WOPAIR 


02062 


WHAT 


03154 


WQCNTR 


"03266 


XI 


03230 




X2 


03231 


X3 


03232 


X4 


03233 


X5 


03234 


o 
o 
o 
o 
o 
o 




X6 


03235 

































o 



















o 



o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 



o 



o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 

o 
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LOADEK 



BLKNUM 

UpAfUIW 

TYPUNE 

DIRECT 

LOAURA 

ITS12K 

ITSiiSK 

LOADRF 

LDADRU 

LOAPRH 

SWITCH 

COMP.l 

UOAUPG 

ChKR,2 

READBK 

BKMODE 

INTPRT 

CONST 

RR0T6 

BUFF 

TMEMS2 

NOFITM 

A 

L,0W4K 

X3 

SWIND 

CNTR 

CORMAP 

PROCNT 

TEMPA 

TENS 

WQCNTR 

EBA 



000024 
000271 
000522 

000565 

01142 
S;il220 
a 1230 
01264 
01374 
yi434 
feJl526 
01604 
01665 
0X717 
02007 
02054 
02122 
02173 
y2236 
02330 
03134 
03167 
03221 
03226 
03232 
03236 
03242 
03246 
03252 
03256 
03262 
03266 
707764 



SRC 


LOAD 


PROGRAMS FOR 


INTERACTIVE MODE, 




GETMON 


000120 


CHAIN 


000247 


WAIT 


000253 


READ 


000314 


tSlXBT 


000460 


CRL,F 


000514 


UR0T6 


000533 


PSqiJ 


000540 


UPREFX 


000560 


SLINK 


000756 


LOADER 


"01100 


U0AD,6 


01134 


LOADRB 


01160 


IIOADRC 


01170 


ITS8K 


01216 


ITS16K 


01222 


JTS20K 


01224 


ltS24K 


01226 


ITS32K 


01232 


UAQRD 


01233 


LOADRG 


01252 


LOADRE 


01313 


L,0AURJ 


01330 


iOADRK 


01347 


NOTINO 


01400 


I.OAPRN 


01403 


LOAORP 


01425 


FIND.K 


01461 


(,OAd,0 


01501 


L.0AD,1 


01503 


LOAD, 2 


01532 


LOAD, 3 


01546 


COMP,0 


01554 


endlst 


01623 


01,00,1 


01635 


NOUOAD 


01653 


LOAD, 4 


01673 


f^XTPRG 


01712 


CNKCOR 


01715 


CHKRil 


01723 


LQAD.S 


01747 


L,OAoRW 


01761 


READBl 


02032 


GETWRP 


02036 


CORE 


02050 


PGMOOE 


02056 


WDPA|R 


02062 


PPUFF 


02117 


LDADD 


02143 


IDAUDE 


02151 


RUOIN? 


023,63 


AOPNTR 


02175 


SA 


02200 


OBPRSI, 


02213 


PR2DD 


02243 


PBPRSR 


02273 


UOADRM 


02321 


ACTLST 


002526 


PTBUF 


02526 


tSYStP 


03126 


WHAT 


03154 


NOTIN 


03156 


REPUN 


03164 


TITI,E 


03173 


CHKSRl 


03176 


UCMSG 


03210 


B 


03222 


AUI^OFG 


03224 


ITRQNT 


03225 


TLAD 


03227 


XI ' 


03230 


X2 


03231 


X4 


03233 


X5 


03234 


x§ 


03235 


CARCNT 


03237 


OHKSUM 


03240 


Ci,OADR 


03241 


CNTWDl 


03243 


CN1W02 


03244 


CNTW03 


03245 


DMEMS2 


03247 


NUM 


03250 


PG0R8K 


03251 


SLDAOR 


03253 


STRG 


03254 


TEMP 


03255 


TEMPE 


03257 


TEMP^ 


03260 


T|MP2 


03261 


UNITS 


03263 


QPDtBK 


03264 


WOCNTR 


03265 


KSF 


700311 


KRB 


700312 


EEH 


707702 
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